3.589 \(\int \frac{x^3}{\left (a+b x^n+c x^{2 n}\right )^{3/2}} \, dx\)

Optimal. Leaf size=151 \[ \frac{x^4 \sqrt{\frac{2 c x^n}{b-\sqrt{b^2-4 a c}}+1} \sqrt{\frac{2 c x^n}{\sqrt{b^2-4 a c}+b}+1} F_1\left (\frac{4}{n};\frac{3}{2},\frac{3}{2};\frac{n+4}{n};-\frac{2 c x^n}{b-\sqrt{b^2-4 a c}},-\frac{2 c x^n}{b+\sqrt{b^2-4 a c}}\right )}{4 a \sqrt{a+b x^n+c x^{2 n}}} \]

[Out]

(x^4*Sqrt[1 + (2*c*x^n)/(b - Sqrt[b^2 - 4*a*c])]*Sqrt[1 + (2*c*x^n)/(b + Sqrt[b^
2 - 4*a*c])]*AppellF1[4/n, 3/2, 3/2, (4 + n)/n, (-2*c*x^n)/(b - Sqrt[b^2 - 4*a*c
]), (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c])])/(4*a*Sqrt[a + b*x^n + c*x^(2*n)])

_______________________________________________________________________________________

Rubi [A]  time = 0.480818, antiderivative size = 151, normalized size of antiderivative = 1., number of steps used = 2, number of rules used = 2, integrand size = 22, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.091 \[ \frac{x^4 \sqrt{\frac{2 c x^n}{b-\sqrt{b^2-4 a c}}+1} \sqrt{\frac{2 c x^n}{\sqrt{b^2-4 a c}+b}+1} F_1\left (\frac{4}{n};\frac{3}{2},\frac{3}{2};\frac{n+4}{n};-\frac{2 c x^n}{b-\sqrt{b^2-4 a c}},-\frac{2 c x^n}{b+\sqrt{b^2-4 a c}}\right )}{4 a \sqrt{a+b x^n+c x^{2 n}}} \]

Antiderivative was successfully verified.

[In]  Int[x^3/(a + b*x^n + c*x^(2*n))^(3/2),x]

[Out]

(x^4*Sqrt[1 + (2*c*x^n)/(b - Sqrt[b^2 - 4*a*c])]*Sqrt[1 + (2*c*x^n)/(b + Sqrt[b^
2 - 4*a*c])]*AppellF1[4/n, 3/2, 3/2, (4 + n)/n, (-2*c*x^n)/(b - Sqrt[b^2 - 4*a*c
]), (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c])])/(4*a*Sqrt[a + b*x^n + c*x^(2*n)])

_______________________________________________________________________________________

Rubi in Sympy [A]  time = 41.3711, size = 128, normalized size = 0.85 \[ \frac{x^{4} \sqrt{a + b x^{n} + c x^{2 n}} \operatorname{appellf_{1}}{\left (\frac{4}{n},\frac{3}{2},\frac{3}{2},\frac{n + 4}{n},- \frac{2 c x^{n}}{b - \sqrt{- 4 a c + b^{2}}},- \frac{2 c x^{n}}{b + \sqrt{- 4 a c + b^{2}}} \right )}}{4 a^{2} \sqrt{\frac{2 c x^{n}}{b - \sqrt{- 4 a c + b^{2}}} + 1} \sqrt{\frac{2 c x^{n}}{b + \sqrt{- 4 a c + b^{2}}} + 1}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate(x**3/(a+b*x**n+c*x**(2*n))**(3/2),x)

[Out]

x**4*sqrt(a + b*x**n + c*x**(2*n))*appellf1(4/n, 3/2, 3/2, (n + 4)/n, -2*c*x**n/
(b - sqrt(-4*a*c + b**2)), -2*c*x**n/(b + sqrt(-4*a*c + b**2)))/(4*a**2*sqrt(2*c
*x**n/(b - sqrt(-4*a*c + b**2)) + 1)*sqrt(2*c*x**n/(b + sqrt(-4*a*c + b**2)) + 1
))

_______________________________________________________________________________________

Mathematica [B]  time = 5.76469, size = 1947, normalized size = 12.89 \[ \text{result too large to display} \]

Warning: Unable to verify antiderivative.

[In]  Integrate[x^3/(a + b*x^n + c*x^(2*n))^(3/2),x]

[Out]

(x^4*((-2*(b^2 - 2*a*c + b*c*x^n)*(a + x^n*(b + c*x^n)))/n + (64*a^2*b*c*(2 + n)
*x^n*(b - Sqrt[b^2 - 4*a*c] + 2*c*x^n)*(b + Sqrt[b^2 - 4*a*c] + 2*c*x^n)*AppellF
1[(4 + n)/n, 1/2, 1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-
b + Sqrt[b^2 - 4*a*c])])/((-b + Sqrt[b^2 - 4*a*c])*(b + Sqrt[b^2 - 4*a*c])*n*(4
+ n)*((b + Sqrt[b^2 - 4*a*c])*n*x^n*AppellF1[2 + 4/n, 1/2, 3/2, 3 + 4/n, (-2*c*x
^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] - (-b + Sqrt[b^
2 - 4*a*c])*n*x^n*AppellF1[2 + 4/n, 3/2, 1/2, 3 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2
- 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] - 8*a*(2 + n)*AppellF1[(4 + n)/n,
1/2, 1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2
- 4*a*c])])) + (a^2*(4 + n)*(b - Sqrt[b^2 - 4*a*c] + 2*c*x^n)*(b + Sqrt[b^2 - 4
*a*c] + 2*c*x^n)*AppellF1[4/n, 1/2, 1/2, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4
*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])])/(4*a*(4 + n)*AppellF1[4/n, 1/2, 1/2
, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*
c])] - n*x^n*((b + Sqrt[b^2 - 4*a*c])*AppellF1[(4 + n)/n, 1/2, 3/2, 2 + 4/n, (-2
*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] + (b - Sqrt
[b^2 - 4*a*c])*AppellF1[(4 + n)/n, 3/2, 1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 -
4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])])) - (a*b^2*(4 + n)*(b - Sqrt[b^2 -
4*a*c] + 2*c*x^n)*(b + Sqrt[b^2 - 4*a*c] + 2*c*x^n)*AppellF1[4/n, 1/2, 1/2, (4
+ n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])])
/(4*c*(4*a*(4 + n)*AppellF1[4/n, 1/2, 1/2, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 -
4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] - n*x^n*((b + Sqrt[b^2 - 4*a*c])*A
ppellF1[(4 + n)/n, 1/2, 3/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x
^n)/(-b + Sqrt[b^2 - 4*a*c])] + (b - Sqrt[b^2 - 4*a*c])*AppellF1[(4 + n)/n, 3/2,
1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*
a*c])]))) - (4*a^2*(4 + n)*(b - Sqrt[b^2 - 4*a*c] + 2*c*x^n)*(b + Sqrt[b^2 - 4*a
*c] + 2*c*x^n)*AppellF1[4/n, 1/2, 1/2, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a
*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])])/(n*(4*a*(4 + n)*AppellF1[4/n, 1/2, 1/
2, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a
*c])] - n*x^n*((b + Sqrt[b^2 - 4*a*c])*AppellF1[(4 + n)/n, 1/2, 3/2, 2 + 4/n, (-
2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] + (b - Sqr
t[b^2 - 4*a*c])*AppellF1[(4 + n)/n, 3/2, 1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2
- 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])]))) + (2*a*b^2*(4 + n)*(b - Sqrt[b
^2 - 4*a*c] + 2*c*x^n)*(b + Sqrt[b^2 - 4*a*c] + 2*c*x^n)*AppellF1[4/n, 1/2, 1/2,
(4 + n)/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c
])])/(c*n*(4*a*(4 + n)*AppellF1[4/n, 1/2, 1/2, (4 + n)/n, (-2*c*x^n)/(b + Sqrt[b
^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] - n*x^n*((b + Sqrt[b^2 - 4*a*c
])*AppellF1[(4 + n)/n, 1/2, 3/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2
*c*x^n)/(-b + Sqrt[b^2 - 4*a*c])] + (b - Sqrt[b^2 - 4*a*c])*AppellF1[(4 + n)/n,
3/2, 1/2, 2 + 4/n, (-2*c*x^n)/(b + Sqrt[b^2 - 4*a*c]), (2*c*x^n)/(-b + Sqrt[b^2
- 4*a*c])])))))/(a*(-b^2 + 4*a*c)*(a + x^n*(b + c*x^n))^(3/2))

_______________________________________________________________________________________

Maple [F]  time = 0.019, size = 0, normalized size = 0. \[ \int{{x}^{3} \left ( a+b{x}^{n}+c{x}^{2\,n} \right ) ^{-{\frac{3}{2}}}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int(x^3/(a+b*x^n+c*x^(2*n))^(3/2),x)

[Out]

int(x^3/(a+b*x^n+c*x^(2*n))^(3/2),x)

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{x^{3}}{{\left (c x^{2 \, n} + b x^{n} + a\right )}^{\frac{3}{2}}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x^3/(c*x^(2*n) + b*x^n + a)^(3/2),x, algorithm="maxima")

[Out]

integrate(x^3/(c*x^(2*n) + b*x^n + a)^(3/2), x)

_______________________________________________________________________________________

Fricas [F(-2)]  time = 0., size = 0, normalized size = 0. \[ \text{Exception raised: TypeError} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x^3/(c*x^(2*n) + b*x^n + a)^(3/2),x, algorithm="fricas")

[Out]

Exception raised: TypeError

_______________________________________________________________________________________

Sympy [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{x^{3}}{\left (a + b x^{n} + c x^{2 n}\right )^{\frac{3}{2}}}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x**3/(a+b*x**n+c*x**(2*n))**(3/2),x)

[Out]

Integral(x**3/(a + b*x**n + c*x**(2*n))**(3/2), x)

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{x^{3}}{{\left (c x^{2 \, n} + b x^{n} + a\right )}^{\frac{3}{2}}}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x^3/(c*x^(2*n) + b*x^n + a)^(3/2),x, algorithm="giac")

[Out]

integrate(x^3/(c*x^(2*n) + b*x^n + a)^(3/2), x)